PlantsSpecies Derived Type

type, public :: PlantsSpecies


Components

Type Visibility Attributes Name Initial
real(kind=float), public :: GPPtoNPP

GPP/NPP ratio

real(kind=float), public :: agemax

maximum age

real(kind=float), public :: albedo

plant albedo (0-1)

real(kind=float), public :: alpha

canopy quantum efficiency (molC/molPAR)

real(kind=float), public :: as

scaling coefficient in stem mass v diameter relationship

real(kind=float), public :: canopymax

maximum canopy storage capacity (m)

real(kind=float), public :: cra

Chapman-Richards asymptotic maximum height

real(kind=float), public :: crb

Chapman-Richards exponential decay parameter

real(kind=float), public :: crc

Chapman-Richards shape parameter

real(kind=float), public :: dbhdcmax

maximum ratio between stem and crown diameters (m/cm)

real(kind=float), public :: dbhdcmin

minimum ratio between stem and crown diameters (m/cm)

real(kind=float), public :: denmax

minimum tree density (trees/ha)

real(kind=float), public :: denmin

minimum tree density (trees/ha)

real(kind=float), public :: fpra

parameter 1 to compute allocation factors

real(kind=float), public :: fprn

parameter 2 to compute allocation factors

real(kind=float), public :: hdmax

H/D ratio in carbon partitioning for high density

real(kind=float), public :: hdmin

H/D ratio in carbon partitioning for low density

real(kind=float), public :: k

extinction coefficient for absorption of PAR by canopy

real(kind=float), public :: laimax

maximum leaf area index used for precipitation interception (m2/m2)

real(kind=float), public :: ltr

leaf turnover rate [s-1]

real(kind=float), public :: mf

Fractions of mean leaf biomass pools per tree on each dying tree

real(kind=float), public :: mr

Fractions of mean root biomass pools per tree on each dying tree

real(kind=float), public :: ms

Fractions of mean stem biomass pools per tree on each dying tree

character(len=50), public :: name

species name, Fagus, Abies, ...

real(kind=float), public :: ns

scaling exponent in stem mass v diameter relationship

character(len=1), public :: phenology

evergreen (E), deciduous (D)

real(kind=float), public :: rtr

root turnover rate [s-1]

real(kind=float), public :: sla

specific leaf area [m2/Kg]

real(kind=float), public :: spra

parameter 3 to compute allocation factors

real(kind=float), public :: sprn

parameter 4 to compute allocation factors

real(kind=float), public :: tcold_leaf

temperature threshold that accelerates leaf turnover (°C)

real(kind=float), public :: theta_fswc

parameter to compute soil water content modifier

real(kind=float), public :: theta_fvpd

parameter to compute vapor pressure deficit modifier

real(kind=float), public :: tmax

maximum temperature for vegetation growing (°C)

real(kind=float), public :: tmin

minimum temperature for vegetation growing (°C)

real(kind=float), public :: topt

optimum temperature for vegetation growing (°C)

real(kind=float), public :: wSx1000

Fractions of mean leaf biomass pools per tree on each dying tree

real(kind=float), public :: wood_density

wood density (kg/m3)


Source Code

TYPE PlantsSpecies
    !Descriptor
    CHARACTER (LEN = 50)  :: name  !!species name, Fagus, Abies, ...
    CHARACTER (LEN = 1)   :: phenology !! evergreen (E), deciduous (D)
    REAL (KIND = float)   :: alpha !! canopy quantum efficiency (molC/molPAR)
    REAL (KIND = float)   :: GPPtoNPP !!GPP/NPP ratio
    REAL (KIND = float)   :: k !! extinction coefficient for absorption of PAR by canopy
    REAL (KIND = float)   :: cra !! Chapman-Richards asymptotic maximum height
    REAL (KIND = float)   :: crb !! Chapman-Richards exponential decay parameter
    REAL (KIND = float)   :: crc !! Chapman-Richards shape parameter
    REAL (KIND = float)   :: as !! scaling coefficient in stem mass v diameter relationship
    REAL (KIND = float)   :: ns !! scaling exponent in stem mass v diameter relationship
    !REAL (KIND = float)   :: saf !! stem allocation factor
    !REAL (KIND = float)   :: raf !! root allocation factor
    !REAL (KIND = float)   :: laf !! leaf (foliage) allocation factor
    REAL (KIND = float)   :: dbhdcmin !! minimum ratio between stem and crown diameters (m/cm)
    REAL (KIND = float)   :: dbhdcmax !! maximum ratio between stem and crown diameters (m/cm)
    REAL (KIND = float)   :: denmin !! minimum tree density (trees/ha)
    REAL (KIND = float)   :: denmax !! minimum tree density (trees/ha)
    REAL (KIND = float)   :: agemax !! maximum age
    REAL (KIND = float)   :: tmax !! maximum temperature for vegetation growing (°C)
    REAL (KIND = float)   :: tmin !! minimum temperature for vegetation growing (°C)
    REAL (KIND = float)   :: topt !! optimum temperature for vegetation growing (°C)
    REAL (KIND = float)   :: theta_fswc !! parameter to compute soil water content modifier 
    REAL (KIND = float)   :: theta_fvpd !! parameter to compute vapor pressure deficit modifier
    REAL (KIND = float)   :: fpra !! parameter 1 to compute allocation factors
    REAL (KIND = float)   :: fprn !! parameter 2 to compute allocation factors
    REAL (KIND = float)   :: spra !! parameter 3 to compute allocation factors
    REAL (KIND = float)   :: sprn !! parameter 4 to compute allocation factors
    REAL (KIND = float)   :: ltr !!leaf turnover rate [s-1]
    REAL (KIND = float)   :: rtr !!root turnover rate [s-1]
    REAL (KIND = float)   :: tcold_leaf !! temperature threshold that accelerates leaf turnover (°C)
    REAL (KIND = float)   :: sla !! specific leaf area  [m2/Kg]
    REAL (KIND = float)   :: hdmin !! H/D ratio in carbon partitioning for low density
    REAL (KIND = float)   :: hdmax !! H/D ratio in carbon partitioning for high density
    REAL (KIND = float)   :: albedo !!plant albedo (0-1)
    REAL (KIND = float)   :: laimax !!maximum leaf area index used for precipitation interception (m2/m2)
    REAL (KIND = float)   :: canopymax !! maximum canopy storage capacity (m)
    REAL (KIND = float)   :: wood_density !! wood density (kg/m3)
    REAL (KIND = float)   :: ms !! Fractions of mean stem biomass pools per tree on each dying tree
    REAL (KIND = float)   :: mr !!  Fractions of mean root biomass pools per tree on each dying tree
    REAL (KIND = float)   :: mf !!  Fractions of mean leaf biomass pools per tree on each dying tree
    REAL (KIND = float)   :: wSx1000 !!  Fractions of mean leaf biomass pools per tree on each dying tree
END TYPE PlantsSpecies